home *** CD-ROM | disk | FTP | other *** search
/ Sports Illustrated for Kids - Awesome Athletes! / Sports Illustrated for Kids - Awesome Athletes!.iso / intro.dir / 00007.ls < prev    next >
Encoding:
Text File  |  1996-04-18  |  666 b   |  19 lines
  1. on exitFrame
  2.   global gASKPrompt, gASKReturn, gINNewUser, gSICDPath
  3.   set gASKReturn to -1
  4.   set gASKPrompt to gINNewUser
  5.   SetCursor(#wait)
  6.   set the fileName of window "new" to gSICDPath & "new"
  7.   set the modal of window "new" to 1
  8.   set the windowType of window "new" to 1
  9.   set the visible of window "new" to 0
  10.   set vRect to the rect of window "new"
  11.   set vLeft to the stageLeft + 320 - (getAt(vRect, 3) / 2)
  12.   set vRight to vLeft + getAt(vRect, 3)
  13.   set vTop to the stageTop + 240 - (getAt(vRect, 4) / 2)
  14.   set vBottom to vTop + getAt(vRect, 4)
  15.   set the rect of window "new" to rect(vLeft, vTop, vRight, vBottom)
  16.   open(window "new")
  17.   SetCursor(#normal)
  18. end
  19.